From: Juanma Barranquero Date: Wed, 16 May 2007 15:43:57 +0000 (+0000) Subject: (compilation-handle-exit): Quote first argument of `run-hook-with-args'. X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~421^2~18855 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=daf2af407920124280c2cf90dd0441733ce63fce;p=emacs.git (compilation-handle-exit): Quote first argument of `run-hook-with-args'. --- diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index 1613fd8f976..a3107339c2b 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el @@ -1448,7 +1448,7 @@ Turning the mode on runs the normal hook `compilation-minor-mode-hook'." (with-no-warnings (if compilation-finish-function (funcall compilation-finish-function (current-buffer) msg))) - (run-hook-with-args compilation-finish-functions (current-buffer) msg))) + (run-hook-with-args 'compilation-finish-functions (current-buffer) msg))) ;; Called when compilation process changes state. (defun compilation-sentinel (proc msg)